home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / x68000.arc / SOURCE.ARC / LISTING.DEF < prev    next >
Encoding:
Modula Definition  |  1986-01-23  |  757 b   |  30 lines

  1. DEFINITION MODULE Listing;
  2. (* Creates a program listing, including Addresses, Code & Source. *)
  3.  
  4.    FROM FileSystem IMPORT
  5.       File;
  6.  
  7.    FROM LongNumbers IMPORT
  8.       LONG;
  9.  
  10.  
  11.    EXPORT QUALIFIED
  12.       StartListing, WriteListLine, WriteSymTab;
  13.  
  14.  
  15.    PROCEDURE StartListing (VAR f : File);
  16.    (* Sign on messages for listing file -- initialize *)
  17.  
  18.  
  19.    PROCEDURE WriteListLine (VAR f : File; 
  20.                             AddrCnt, ObjOp, ObjSrc, ObjDest : LONG;
  21.                                nA,     nO,    nS,     nD    : CARDINAL);
  22.    (* Writes one line to the Listing file, Including Object Code *)
  23.  
  24.  
  25.    PROCEDURE WriteSymTab (VAR f : File; NumSym : CARDINAL);
  26.    (* Lists symbol table in alphabetical order *)
  27.  
  28. END Listing.
  29.  
  30.